The objectives for this week are to
Make sure you have these packages installed:
install.packages(c("tidyverse", "tourr", "MASS", "spinifex", "mvtnorm", "tidymodels", "discrim", "broom"))
If you are in a zoom tutorial, say hello in the chat. If in person, do say hello to your tutor and to your neighbours.
# This is code that YOU CAN RUN YOURSELF to see the tour,
# but its not necessary to run in order to do the exercise
library(tidyverse)
olive <- read_csv("http://www.ggobi.org/book/data/olive.csv") %>%
dplyr::select(-X1)
library(tourr)
animate_xy(olive[, 3:10], axes="off")